/************************************************************************/
/*  									*/
/*  cenrplc_MI.c							*/
/*									*/
/*  Tom Lookabaugh							*/
/*  August 13, 1987							*/
/*  Last Revision: August 15, 1987					*/
/*									*/
/*  DESCRIPTION								*/
/*	Update centroid information.					*/
/*	Modified Itakura Version: Divide accumulated normalized 	*/
/*	autocorrelations by count and then use Levinson's algorithm	*/
/*	to compute new filter autocorrelations.  Note that this is	*/
/*	an approximate centroid and amounts to approximating a		*/
/* 	geometric mean by an arithmetic mean.				*/
/*  RETURNS								*/
/*	No significant return value.  Modifies storage pointed to by	*/
/*	updtinfo and centroid.						*/
/*  CALLS								*/
/*	autometh().							*/
/*									*/
/************************************************************************/

#include "stdvq.h"
#include <math.h>

cenrplc (updtinfo, centroid, count) 

    double* updtinfo;	/* pointer to cenupdt member			*/
    double* centroid;	/* vector to be used in updating		*/
    long count;		/* cell population				*/

{

    int d;		/* iteration counter				*/
    double temp_double;	/* temporary storage				*/
    
    for (d = 0; d < cdbkupdim; d++) {
	updtinfo[d] /= ((double) count);
    }
    autometh(updtinfo, cdbkupdim - 1, centroid, &temp_double);
}
